X-Git-Url: https://shimmer.witbreuk.eu/gitweb/UltimateKEYS.git/blobdiff_plain/f935092a39203caefc387da163286b7c3664c78b..76ae338ba82e9bb5466c3e36708b0aca8f99580b:/autohotkey-v2.0/UltimateKEYS%20(for%20AutoHotkey%20v2.0).ahk?ds=inline

diff --git a/autohotkey-v2.0/UltimateKEYS (for AutoHotkey v2.0).ahk b/autohotkey-v2.0/UltimateKEYS (for AutoHotkey v2.0).ahk
index 1ebe190..8cfce66 100644
--- a/autohotkey-v2.0/UltimateKEYS (for AutoHotkey v2.0).ahk	
+++ b/autohotkey-v2.0/UltimateKEYS (for AutoHotkey v2.0).ahk	
@@ -1,4 +1,4 @@
-; UltimateKEYS (for AutoHotkey v2.0).ahk - 2022-11-04
+; UltimateKEYS (for AutoHotkey v2.0).ahk - 2023-04-18
 
 ; Website :  www.ultimatekeys.info (pieter-degroote.github.io/UltimateKEYS/)
 
@@ -23,6 +23,101 @@ SendMode "Input"  ; optimizes for faster and more reliable input
 global gEndKeys := "{bs}{del}{esc}{home}{end}"  ; ends dead key input on specific keys
 
 
+; Compose :  Acute Accent (')
+
+global cmpAcuteAccent := Map()
+cmpAcuteAccent["a"] := "{u+00e1}"  ; (á) a with acute
+cmpAcuteAccent["A"] := "{u+00c1}"  ; (Á) A with acute
+cmpAcuteAccent["c"] := "{u+0107}"  ; (ć) c with acute
+cmpAcuteAccent["C"] := "{u+0106}"  ; (Ć) C with acute
+cmpAcuteAccent["d"] := "{u+1e09}"  ; (ḉ) c with cedilla and acute
+cmpAcuteAccent["D"] := "{u+1e08}"  ; (Ḉ) C with cedilla and acute
+cmpAcuteAccent["e"] := "{u+00e9}"  ; (é) e with acute
+cmpAcuteAccent["E"] := "{u+00c9}"  ; (É) E with acute
+cmpAcuteAccent["g"] := "{u+01f5}"  ; (ǵ) g with acute
+cmpAcuteAccent["G"] := "{u+01f4}"  ; (Ç´) G with acute
+cmpAcuteAccent["i"] := "{u+00ed}"  ; (í) i with acute
+cmpAcuteAccent["I"] := "{u+00cd}"  ; (Í) I with acute
+cmpAcuteAccent["j"] := "{u+01ff}"  ; (Ç¿) o with stroke and acute
+cmpAcuteAccent["J"] := "{u+01fe}"  ; (Ǿ) O with stroke and acute
+cmpAcuteAccent["k"] := "{u+1e31}"  ; (ḱ) k with acute
+cmpAcuteAccent["K"] := "{u+1e30}"  ; (Ḱ) K with acute
+cmpAcuteAccent["l"] := "{u+013a}"  ; (ĺ) l with acute
+cmpAcuteAccent["L"] := "{u+0139}"  ; (Ĺ) L with acute
+cmpAcuteAccent["m"] := "{u+1e3f}"  ; (ḿ) m with acute
+cmpAcuteAccent["M"] := "{u+1e3e}"  ; (Ḿ) M with acute
+cmpAcuteAccent["n"] := "{u+0144}"  ; (ń) n with acute
+cmpAcuteAccent["N"] := "{u+0143}"  ; (Ń) N with acute
+cmpAcuteAccent["o"] := "{u+00f3}"  ; (ó) o with acute
+cmpAcuteAccent["O"] := "{u+00d3}"  ; (Ó) O with acute
+cmpAcuteAccent["p"] := "{u+1e55}"  ; (ṕ) p with acute
+cmpAcuteAccent["P"] := "{u+1e54}"  ; (Ṕ) P with acute
+cmpAcuteAccent["q"] := "{u+01fd}"  ; (ǽ) ae with acute
+cmpAcuteAccent["Q"] := "{u+01fc}"  ; (Ǽ) AE with acute
+cmpAcuteAccent["r"] := "{u+0155}"  ; (ŕ) r with acute
+cmpAcuteAccent["R"] := "{u+0154}"  ; (Ŕ) R with acute
+cmpAcuteAccent["s"] := "{u+015b}"  ; (ś) s with acute
+cmpAcuteAccent["S"] := "{u+015a}"  ; (Ś) S with acute
+cmpAcuteAccent["u"] := "{u+00fa}"  ; (ú) u with acute
+cmpAcuteAccent["U"] := "{u+00da}"  ; (Ú) U with acute
+cmpAcuteAccent["w"] := "{u+1e83}"  ; (ẃ) w with acute
+cmpAcuteAccent["W"] := "{u+1e82}"  ; (Ẃ) W with acute
+cmpAcuteAccent["x"] := "{u+01fb}"  ; (Ç») a with ring above and acute
+cmpAcuteAccent["X"] := "{u+01fa}"  ; (Ǻ) A with ring above and acute
+cmpAcuteAccent["y"] := "{u+00fd}"  ; (ý) y with acute
+cmpAcuteAccent["Y"] := "{u+00dd}"  ; (Ý) Y with acute
+cmpAcuteAccent["z"] := "{u+017a}"  ; (ź) z with acute
+cmpAcuteAccent["Z"] := "{u+0179}"  ; (Ź) Z with acute
+cmpAcuteAccent[" "] := "{u+00b4}"  ; (´) acute accent
+
+
+; Compose :  Grave Accent (`)
+
+global cmpGraveAccent := Map()
+cmpGraveAccent["a"] := "{u+00e0}"  ; (à) a with grave
+cmpGraveAccent["A"] := "{u+00c0}"  ; (À) A with grave
+cmpGraveAccent["e"] := "{u+00e8}"  ; (è) e with grave
+cmpGraveAccent["E"] := "{u+00c8}"  ; (È) E with grave
+cmpGraveAccent["i"] := "{u+00ec}"  ; (ì) i with grave
+cmpGraveAccent["I"] := "{u+00cc}"  ; (Ì) I with grave
+cmpGraveAccent["n"] := "{u+01f9}"  ; (ǹ) n with grave
+cmpGraveAccent["N"] := "{u+01f8}"  ; (Ǹ) N with grave
+cmpGraveAccent["o"] := "{u+00f2}"  ; (ò) o with grave
+cmpGraveAccent["O"] := "{u+00d2}"  ; (Ò) O with grave
+cmpGraveAccent["u"] := "{u+00f9}"  ; (ù) u with grave
+cmpGraveAccent["U"] := "{u+00d9}"  ; (Ù) U with grave
+cmpGraveAccent["w"] := "{u+1e81}"  ; (ẁ) w with grave
+cmpGraveAccent["W"] := "{u+1e80}"  ; (Ẁ) W with grave
+cmpGraveAccent["y"] := "{u+1ef3}"  ; (ỳ) y with grave
+cmpGraveAccent["Y"] := "{u+1ef2}"  ; (Ỳ) Y with grave
+cmpGraveAccent[" "] := "{u+02cb}"  ; (ˋ) grave accent (modifier)
+
+
+; Compose :  Diaeresis (")
+
+global cmpDiaeresis := Map()
+cmpDiaeresis["a"] := "{u+00e4}"  ; (ä) a with diaeresis
+cmpDiaeresis["A"] := "{u+00c4}"  ; (Ä) A with diaeresis
+cmpDiaeresis["e"] := "{u+00eb}"  ; (ë) e with diaeresis
+cmpDiaeresis["E"] := "{u+00cb}"  ; (Ë) E with diaeresis
+cmpDiaeresis["h"] := "{u+1e27}"  ; (ḧ) h with diaeresis
+cmpDiaeresis["H"] := "{u+1e26}"  ; (Ḧ) H with diaeresis
+cmpDiaeresis["i"] := "{u+00ef}"  ; (ï) i with diaeresis
+cmpDiaeresis["I"] := "{u+00cf}"  ; (Ï) I with diaeresis
+cmpDiaeresis["o"] := "{u+00f6}"  ; (ö) o with diaeresis
+cmpDiaeresis["O"] := "{u+00d6}"  ; (Ö) O with diaeresis
+cmpDiaeresis["t"] := "{u+1e97}"  ; (ẗ) t with diaeresis
+cmpDiaeresis["u"] := "{u+00fc}"  ; (ü) u with diaeresis
+cmpDiaeresis["U"] := "{u+00dc}"  ; (Ü) U with diaeresis
+cmpDiaeresis["w"] := "{u+1e85}"  ; (ẅ) w with diaeresis
+cmpDiaeresis["W"] := "{u+1e84}"  ; (Ẅ) W with diaeresis
+cmpDiaeresis["x"] := "{u+1e8d}"  ; (ẍ) x with diaeresis
+cmpDiaeresis["X"] := "{u+1e8c}"  ; (Ẍ) X with diaeresis
+cmpDiaeresis["y"] := "{u+00ff}"  ; (ÿ) y with diaeresis
+cmpDiaeresis["Y"] := "{u+0178}"  ; (Ÿ) Y with diaeresis
+cmpDiaeresis[" "] := "{u+00a8}"  ; (¨) diaeresis
+
+
 ; Compose :  Circumflex Accent (c)
 
 global cmpCircumflex := Map()
@@ -55,6 +150,69 @@ cmpCircumflex["Z"] := "{u+1e90}"  ; (Ẑ) Z with circumflex
 cmpCircumflex[" "] := "{u+02c6}"  ; (ˆ) circumflex accent (modifier)
 
 
+; Compose :  Tilde (~)
+
+global cmpTilde := Map()
+cmpTilde["a"] := "{u+00e3}"  ; (ã) a with tilde
+cmpTilde["A"] := "{u+00c3}"  ; (Ã) A with tilde
+cmpTilde["e"] := "{u+1ebd}"  ; (ẽ) e with tilde
+cmpTilde["E"] := "{u+1ebc}"  ; (Ẽ) E with tilde
+cmpTilde["i"] := "{u+0129}"  ; (Ä©) i with tilde
+cmpTilde["I"] := "{u+0128}"  ; (Ĩ) I with tilde
+cmpTilde["l"] := "{u+026b}"  ; (É«) l with middle tilde
+cmpTilde["L"] := "{u+2c62}"  ; (â±¢) L with middle tilde
+cmpTilde["n"] := "{u+00f1}"  ; (ñ) n with tilde
+cmpTilde["N"] := "{u+00d1}"  ; (Ñ) N with tilde
+cmpTilde["o"] := "{u+00f5}"  ; (õ) o with tilde
+cmpTilde["O"] := "{u+00d5}"  ; (Õ) O with tilde
+cmpTilde["u"] := "{u+0169}"  ; (Å©) u with tilde
+cmpTilde["U"] := "{u+0168}"  ; (Ũ) U with tilde
+cmpTilde["v"] := "{u+1e7d}"  ; (á¹½) v with tilde
+cmpTilde["V"] := "{u+1e7c}"  ; (á¹¼) V with tilde
+cmpTilde["y"] := "{u+1ef9}"  ; (ỹ) y with tilde
+cmpTilde["Y"] := "{u+1ef8}"  ; (Ỹ) Y with tilde
+cmpTilde[" "] := "{u+02dc}"  ; (˜) small tilde
+
+
+; Compose :  Cedilla and Ogonek (,)
+
+global cmpCedillaOgonek := Map()
+cmpCedillaOgonek["a"] := "{u+0105}"  ; (ą) a with ogonek
+cmpCedillaOgonek["A"] := "{u+0104}"  ; (Ą) A with ogonek
+cmpCedillaOgonek["c"] := "{u+00e7}"  ; (ç) c with cedilla
+cmpCedillaOgonek["C"] := "{u+00c7}"  ; (Ç) C with cedilla
+cmpCedillaOgonek["d"] := "{u+1e11}"  ; (ḑ) d with cedilla
+cmpCedillaOgonek["D"] := "{u+1e10}"  ; (Ḑ) D with cedilla
+cmpCedillaOgonek["e"] := "{u+0119}"  ; (ę) e with ogonek
+cmpCedillaOgonek["E"] := "{u+0118}"  ; (Ę) E with ogonek
+cmpCedillaOgonek["f"] := "{u+0229}"  ; (È©) e with cedilla
+cmpCedillaOgonek["F"] := "{u+0228}"  ; (Ȩ) E with cedilla
+cmpCedillaOgonek["g"] := "{u+0123}"  ; (Ä£) g with cedilla
+cmpCedillaOgonek["G"] := "{u+0122}"  ; (Ä¢) G with cedilla
+cmpCedillaOgonek["h"] := "{u+1e29}"  ; (ḩ) h with cedilla
+cmpCedillaOgonek["H"] := "{u+1e28}"  ; (Ḩ) H with cedilla
+cmpCedillaOgonek["i"] := "{u+012f}"  ; (į) i with ogonek
+cmpCedillaOgonek["I"] := "{u+012e}"  ; (Ä®) I with ogonek
+cmpCedillaOgonek["k"] := "{u+0137}"  ; (Ä·) k with cedilla
+cmpCedillaOgonek["K"] := "{u+0136}"  ; (Ķ) K with cedilla
+cmpCedillaOgonek["l"] := "{u+013c}"  ; (ļ) l with cedilla
+cmpCedillaOgonek["L"] := "{u+013b}"  ; (Ä») L with cedilla
+cmpCedillaOgonek["n"] := "{u+0146}"  ; (ņ) n with cedilla
+cmpCedillaOgonek["N"] := "{u+0145}"  ; (Ņ) N with cedilla
+cmpCedillaOgonek["o"] := "{u+01eb}"  ; (Ç«) o with ogonek
+cmpCedillaOgonek["O"] := "{u+01ea}"  ; (Ǫ) O with ogonek
+cmpCedillaOgonek["r"] := "{u+0157}"  ; (ŗ) r with cedilla
+cmpCedillaOgonek["R"] := "{u+0156}"  ; (Ŗ) R with cedilla
+cmpCedillaOgonek["s"] := "{u+015f}"  ; (ş) s with cedilla
+cmpCedillaOgonek["S"] := "{u+015e}"  ; (Ş) S with cedilla
+cmpCedillaOgonek["t"] := "{u+0163}"  ; (Å£) t with cedilla
+cmpCedillaOgonek["T"] := "{u+0162}"  ; (Å¢) T with cedilla
+cmpCedillaOgonek["u"] := "{u+0173}"  ; (ų) u with ogonek
+cmpCedillaOgonek["U"] := "{u+0172}"  ; (Ų) U with ogonek
+cmpCedillaOgonek["."] := "{u+02db}"  ; (˛) ogonek
+cmpCedillaOgonek[" "] := "{u+00b8}"  ; (¸) cedilla
+
+
 ; Compose :  Caron (v)
 
 global cmpCaron := Map()
@@ -128,6 +286,7 @@ cmpDotAbove["o"] := "{u+022f}"  ; (ȯ) o with dot above
 cmpDotAbove["O"] := "{u+022e}"  ; (È®) O with dot above
 cmpDotAbove["p"] := "{u+1e57}"  ; (ṗ) p with dot above
 cmpDotAbove["P"] := "{u+1e56}"  ; (Ṗ) P with dot above
+cmpDotAbove["q"] := "{u+1e9b}"  ; (ẛ) long s with dot above
 cmpDotAbove["r"] := "{u+1e59}"  ; (ṙ) r with dot above
 cmpDotAbove["R"] := "{u+1e58}"  ; (Ṙ) R with dot above
 cmpDotAbove["s"] := "{u+1e61}"  ; (ṡ) s with dot above
@@ -157,7 +316,7 @@ cmpRingAbove["w"] := "{u+1e98}"  ; (ẘ) w with ring above
 cmpRingAbove["y"] := "{u+1e99}"  ; (ẙ) y with ring above
 
 
-; Compose :  Macron/Stroke (-)
+; Compose :  Macron and Stroke (-)
 
 global cmpMacronStroke := Map()
 cmpMacronStroke["a"] := "{u+0101}"  ; (ā) a with macron
@@ -197,15 +356,20 @@ cmpMacronStroke["Z"] := "{u+01b5}"  ; (Ƶ) Z with stroke
 cmpMacronStroke[" "] := "{u+00af}"  ; (¯) macron
 
 
-; Compose :  Macron/Stroke (Additional) (_)
+; Compose :  Macron and Stroke (additional) (_)
 
 global cmpMacronStrokeAdd := Map()
+cmpMacronStrokeAdd["f"] := "{u+1e9d}"  ; (ẝ) long s with high stroke
 cmpMacronStrokeAdd["g"] := "{u+1e21}"  ; (ḡ) g with macron
 cmpMacronStrokeAdd["G"] := "{u+1e20}"  ; (Ḡ) G with macron
 cmpMacronStrokeAdd["i"] := "{u+0268}"  ; (ɨ) i with stroke
 cmpMacronStrokeAdd["I"] := "{u+0197}"  ; (Ɨ) I with stroke
 cmpMacronStrokeAdd["l"] := "{u+019a}"  ; (ƚ) l with bar
 cmpMacronStrokeAdd["L"] := "{u+023d}"  ; (Ƚ) L with bar
+cmpMacronStrokeAdd["o"] := "{u+0275}"  ; (ɵ) barred o
+cmpMacronStrokeAdd["O"] := "{u+019f}"  ; (Ɵ) O with middle tilde
+cmpMacronStrokeAdd["q"] := "{u+01e3}"  ; (Ç£) ae with macron
+cmpMacronStrokeAdd["Q"] := "{u+01e2}"  ; (Ç¢) AE with macron
 cmpMacronStrokeAdd["u"] := "{u+0289}"  ; (ʉ) u with bar
 cmpMacronStrokeAdd["U"] := "{u+0244}"  ; (Ʉ) U with bar
 cmpMacronStrokeAdd["y"] := "{u+024f}"  ; (ɏ) y with stroke
@@ -240,45 +404,6 @@ cmpStroke["t"] := "{u+2c66}"  ; (ⱦ) t with stroke
 cmpStroke["T"] := "{u+023e}"  ; (Ⱦ) T with stroke
 
 
-; Compose :  Cedilla/Ogonek (,)
-
-global cmpCedillaOgonek := Map()
-cmpCedillaOgonek["a"] := "{u+0105}"  ; (ą) a with ogonek
-cmpCedillaOgonek["A"] := "{u+0104}"  ; (Ą) A with ogonek
-cmpCedillaOgonek["c"] := "{u+00e7}"  ; (ç) c with cedilla
-cmpCedillaOgonek["C"] := "{u+00c7}"  ; (Ç) C with cedilla
-cmpCedillaOgonek["d"] := "{u+1e11}"  ; (ḑ) d with cedilla
-cmpCedillaOgonek["D"] := "{u+1e10}"  ; (Ḑ) D with cedilla
-cmpCedillaOgonek["e"] := "{u+0119}"  ; (ę) e with ogonek
-cmpCedillaOgonek["E"] := "{u+0118}"  ; (Ę) E with ogonek
-cmpCedillaOgonek["f"] := "{u+0229}"  ; (È©) e with cedilla
-cmpCedillaOgonek["F"] := "{u+0228}"  ; (Ȩ) E with cedilla
-cmpCedillaOgonek["g"] := "{u+0123}"  ; (Ä£) g with cedilla
-cmpCedillaOgonek["G"] := "{u+0122}"  ; (Ä¢) G with cedilla
-cmpCedillaOgonek["h"] := "{u+1e29}"  ; (ḩ) h with cedilla
-cmpCedillaOgonek["H"] := "{u+1e28}"  ; (Ḩ) H with cedilla
-cmpCedillaOgonek["i"] := "{u+012f}"  ; (į) i with ogonek
-cmpCedillaOgonek["I"] := "{u+012e}"  ; (Ä®) I with ogonek
-cmpCedillaOgonek["k"] := "{u+0137}"  ; (Ä·) k with cedilla
-cmpCedillaOgonek["K"] := "{u+0136}"  ; (Ķ) K with cedilla
-cmpCedillaOgonek["l"] := "{u+013c}"  ; (ļ) l with cedilla
-cmpCedillaOgonek["L"] := "{u+013b}"  ; (Ä») L with cedilla
-cmpCedillaOgonek["n"] := "{u+0146}"  ; (ņ) n with cedilla
-cmpCedillaOgonek["N"] := "{u+0145}"  ; (Ņ) N with cedilla
-cmpCedillaOgonek["o"] := "{u+01eb}"  ; (Ç«) o with ogonek
-cmpCedillaOgonek["O"] := "{u+01ea}"  ; (Ǫ) O with ogonek
-cmpCedillaOgonek["r"] := "{u+0157}"  ; (ŗ) r with cedilla
-cmpCedillaOgonek["R"] := "{u+0156}"  ; (Ŗ) R with cedilla
-cmpCedillaOgonek["s"] := "{u+015f}"  ; (ş) s with cedilla
-cmpCedillaOgonek["S"] := "{u+015e}"  ; (Ş) S with cedilla
-cmpCedillaOgonek["t"] := "{u+0163}"  ; (Å£) t with cedilla
-cmpCedillaOgonek["T"] := "{u+0162}"  ; (Å¢) T with cedilla
-cmpCedillaOgonek["u"] := "{u+0173}"  ; (ų) u with ogonek
-cmpCedillaOgonek["U"] := "{u+0172}"  ; (Ų) U with ogonek
-cmpCedillaOgonek["."] := "{u+02db}"  ; (˛) ogonek
-cmpCedillaOgonek[" "] := "{u+00b8}"  ; (¸) cedilla
-
-
 ; Compose :  Breve and Special Letters (b)
 
 global cmpBreveSpecial := Map()
@@ -311,88 +436,6 @@ cmpBreveSpecial["#"] := "{u+01b7}"  ; (Æ·) capital letter ezh
 cmpBreveSpecial[" "] := "{u+02d8}"  ; (˘) breve
 
 
-; Compose :  Inverted Breve (B)
-
-global cmpInvertedBreve := Map()
-cmpInvertedBreve["a"] := "{u+0203}"  ; (ȃ) a with inverted breve
-cmpInvertedBreve["A"] := "{u+0202}"  ; (Ȃ) A with inverted breve
-cmpInvertedBreve["e"] := "{u+0207}"  ; (ȇ) e with inverted breve
-cmpInvertedBreve["E"] := "{u+0206}"  ; (Ȇ) E with inverted breve
-cmpInvertedBreve["i"] := "{u+020b}"  ; (ȋ) i with inverted breve
-cmpInvertedBreve["I"] := "{u+020a}"  ; (Ȋ) I with inverted breve
-cmpInvertedBreve["o"] := "{u+020f}"  ; (ȏ) o with inverted breve
-cmpInvertedBreve["O"] := "{u+020e}"  ; (Ȏ) O with inverted breve
-cmpInvertedBreve["r"] := "{u+0213}"  ; (ȓ) r with inverted breve
-cmpInvertedBreve["R"] := "{u+0212}"  ; (Ȓ) R with inverted breve
-cmpInvertedBreve["u"] := "{u+0217}"  ; (ȗ) u with inverted breve
-cmpInvertedBreve["U"] := "{u+0216}"  ; (Ȗ) U with inverted breve
-
-
-; Compose :  Acute Accent (')
-
-global cmpAcuteAccent := Map()
-cmpAcuteAccent["a"] := "{u+00e1}"  ; (á) a with acute
-cmpAcuteAccent["A"] := "{u+00c1}"  ; (Á) A with acute
-cmpAcuteAccent["c"] := "{u+0107}"  ; (ć) c with acute
-cmpAcuteAccent["C"] := "{u+0106}"  ; (Ć) C with acute
-cmpAcuteAccent["e"] := "{u+00e9}"  ; (é) e with acute
-cmpAcuteAccent["E"] := "{u+00c9}"  ; (É) E with acute
-cmpAcuteAccent["g"] := "{u+01f5}"  ; (ǵ) g with acute
-cmpAcuteAccent["G"] := "{u+01f4}"  ; (Ç´) G with acute
-cmpAcuteAccent["i"] := "{u+00ed}"  ; (í) i with acute
-cmpAcuteAccent["I"] := "{u+00cd}"  ; (Í) I with acute
-cmpAcuteAccent["k"] := "{u+1e31}"  ; (ḱ) k with acute
-cmpAcuteAccent["K"] := "{u+1e30}"  ; (Ḱ) K with acute
-cmpAcuteAccent["l"] := "{u+013a}"  ; (ĺ) l with acute
-cmpAcuteAccent["L"] := "{u+0139}"  ; (Ĺ) L with acute
-cmpAcuteAccent["m"] := "{u+1e3f}"  ; (ḿ) m with acute
-cmpAcuteAccent["M"] := "{u+1e3e}"  ; (Ḿ) M with acute
-cmpAcuteAccent["n"] := "{u+0144}"  ; (ń) n with acute
-cmpAcuteAccent["N"] := "{u+0143}"  ; (Ń) N with acute
-cmpAcuteAccent["o"] := "{u+00f3}"  ; (ó) o with acute
-cmpAcuteAccent["O"] := "{u+00d3}"  ; (Ó) O with acute
-cmpAcuteAccent["p"] := "{u+1e55}"  ; (ṕ) p with acute
-cmpAcuteAccent["P"] := "{u+1e54}"  ; (Ṕ) P with acute
-cmpAcuteAccent["r"] := "{u+0155}"  ; (ŕ) r with acute
-cmpAcuteAccent["R"] := "{u+0154}"  ; (Ŕ) R with acute
-cmpAcuteAccent["s"] := "{u+015b}"  ; (ś) s with acute
-cmpAcuteAccent["S"] := "{u+015a}"  ; (Ś) S with acute
-cmpAcuteAccent["u"] := "{u+00fa}"  ; (ú) u with acute
-cmpAcuteAccent["U"] := "{u+00da}"  ; (Ú) U with acute
-cmpAcuteAccent["w"] := "{u+1e83}"  ; (ẃ) w with acute
-cmpAcuteAccent["W"] := "{u+1e82}"  ; (Ẃ) W with acute
-cmpAcuteAccent["y"] := "{u+00fd}"  ; (ý) y with acute
-cmpAcuteAccent["Y"] := "{u+00dd}"  ; (Ý) Y with acute
-cmpAcuteAccent["z"] := "{u+017a}"  ; (ź) z with acute
-cmpAcuteAccent["Z"] := "{u+0179}"  ; (Ź) Z with acute
-cmpAcuteAccent[" "] := "{u+00b4}"  ; (´) acute accent
-
-
-; Compose :  Diaeresis (")
-
-global cmpDiaeresis := Map()
-cmpDiaeresis["a"] := "{u+00e4}"  ; (ä) a with diaeresis
-cmpDiaeresis["A"] := "{u+00c4}"  ; (Ä) A with diaeresis
-cmpDiaeresis["e"] := "{u+00eb}"  ; (ë) e with diaeresis
-cmpDiaeresis["E"] := "{u+00cb}"  ; (Ë) E with diaeresis
-cmpDiaeresis["h"] := "{u+1e27}"  ; (ḧ) h with diaeresis
-cmpDiaeresis["H"] := "{u+1e26}"  ; (Ḧ) H with diaeresis
-cmpDiaeresis["i"] := "{u+00ef}"  ; (ï) i with diaeresis
-cmpDiaeresis["I"] := "{u+00cf}"  ; (Ï) I with diaeresis
-cmpDiaeresis["o"] := "{u+00f6}"  ; (ö) o with diaeresis
-cmpDiaeresis["O"] := "{u+00d6}"  ; (Ö) O with diaeresis
-cmpDiaeresis["t"] := "{u+1e97}"  ; (ẗ) t with diaeresis
-cmpDiaeresis["u"] := "{u+00fc}"  ; (ü) u with diaeresis
-cmpDiaeresis["U"] := "{u+00dc}"  ; (Ü) U with diaeresis
-cmpDiaeresis["w"] := "{u+1e85}"  ; (ẅ) w with diaeresis
-cmpDiaeresis["W"] := "{u+1e84}"  ; (Ẅ) W with diaeresis
-cmpDiaeresis["x"] := "{u+1e8d}"  ; (ẍ) x with diaeresis
-cmpDiaeresis["X"] := "{u+1e8c}"  ; (Ẍ) X with diaeresis
-cmpDiaeresis["y"] := "{u+00ff}"  ; (ÿ) y with diaeresis
-cmpDiaeresis["Y"] := "{u+0178}"  ; (Ÿ) Y with diaeresis
-cmpDiaeresis[" "] := "{u+00a8}"  ; (¨) diaeresis
-
-
 ; Compose :  Double Acute Accent (=)
 
 global cmpDoubleAcute := Map()
@@ -403,150 +446,132 @@ cmpDoubleAcute["U"] := "{u+0170}"  ; (Å°) U with double acute
 cmpDoubleAcute[" "] := "{u+02dd}"  ; (˝) double acute accent
 
 
-; Compose :  Grave Accent (`)
-
-global cmpGraveAccent := Map()
-cmpGraveAccent["a"] := "{u+00e0}"  ; (à) a with grave
-cmpGraveAccent["A"] := "{u+00c0}"  ; (À) A with grave
-cmpGraveAccent["e"] := "{u+00e8}"  ; (è) e with grave
-cmpGraveAccent["E"] := "{u+00c8}"  ; (È) E with grave
-cmpGraveAccent["i"] := "{u+00ec}"  ; (ì) i with grave
-cmpGraveAccent["I"] := "{u+00cc}"  ; (Ì) I with grave
-cmpGraveAccent["n"] := "{u+01f9}"  ; (ǹ) n with grave
-cmpGraveAccent["N"] := "{u+01f8}"  ; (Ǹ) N with grave
-cmpGraveAccent["o"] := "{u+00f2}"  ; (ò) o with grave
-cmpGraveAccent["O"] := "{u+00d2}"  ; (Ò) O with grave
-cmpGraveAccent["u"] := "{u+00f9}"  ; (ù) u with grave
-cmpGraveAccent["U"] := "{u+00d9}"  ; (Ù) U with grave
-cmpGraveAccent["w"] := "{u+1e81}"  ; (ẁ) w with grave
-cmpGraveAccent["W"] := "{u+1e80}"  ; (Ẁ) W with grave
-cmpGraveAccent["y"] := "{u+1ef3}"  ; (ỳ) y with grave
-cmpGraveAccent["Y"] := "{u+1ef2}"  ; (Ỳ) Y with grave
-cmpGraveAccent[" "] := "{u+02cb}"  ; (ˋ) grave accent (modifier)
-
-
-; Compose :  Double Grave Accent (G)
-
-global cmpDoubleGrave := Map()
-cmpDoubleGrave["a"] := "{u+0201}"  ; (ȁ) a with double grave
-cmpDoubleGrave["A"] := "{u+0200}"  ; (Ȁ) A with double grave
-cmpDoubleGrave["e"] := "{u+0205}"  ; (ȅ) e with double grave
-cmpDoubleGrave["E"] := "{u+0204}"  ; (Ȅ) E with double grave
-cmpDoubleGrave["i"] := "{u+0209}"  ; (ȉ) i with double grave
-cmpDoubleGrave["I"] := "{u+0208}"  ; (Ȉ) I with double grave
-cmpDoubleGrave["o"] := "{u+020d}"  ; (ȍ) o with double grave
-cmpDoubleGrave["O"] := "{u+020c}"  ; (Ȍ) O with double grave
-cmpDoubleGrave["r"] := "{u+0211}"  ; (ȑ) r with double grave
-cmpDoubleGrave["R"] := "{u+0210}"  ; (Ȑ) R with double grave
-cmpDoubleGrave["u"] := "{u+0215}"  ; (ȕ) u with double grave
-cmpDoubleGrave["U"] := "{u+0214}"  ; (Ȕ) U with double grave
-
-
-; Compose :  Tilde (~)
-
-global cmpTilde := Map()
-cmpTilde["a"] := "{u+00e3}"  ; (ã) a with tilde
-cmpTilde["A"] := "{u+00c3}"  ; (Ã) A with tilde
-cmpTilde["e"] := "{u+1ebd}"  ; (ẽ) e with tilde
-cmpTilde["E"] := "{u+1ebc}"  ; (Ẽ) E with tilde
-cmpTilde["i"] := "{u+0129}"  ; (Ä©) i with tilde
-cmpTilde["I"] := "{u+0128}"  ; (Ĩ) I with tilde
-cmpTilde["l"] := "{u+026b}"  ; (É«) l with middle tilde
-cmpTilde["L"] := "{u+2c62}"  ; (â±¢) L with middle tilde
-cmpTilde["n"] := "{u+00f1}"  ; (ñ) n with tilde
-cmpTilde["N"] := "{u+00d1}"  ; (Ñ) N with tilde
-cmpTilde["o"] := "{u+00f5}"  ; (õ) o with tilde
-cmpTilde["O"] := "{u+00d5}"  ; (Õ) O with tilde
-cmpTilde["u"] := "{u+0169}"  ; (Å©) u with tilde
-cmpTilde["U"] := "{u+0168}"  ; (Ũ) U with tilde
-cmpTilde["v"] := "{u+1e7d}"  ; (á¹½) v with tilde
-cmpTilde["V"] := "{u+1e7c}"  ; (á¹¼) V with tilde
-cmpTilde["y"] := "{u+1ef9}"  ; (ỹ) y with tilde
-cmpTilde["Y"] := "{u+1ef8}"  ; (Ỹ) Y with tilde
-cmpTilde[" "] := "{u+02dc}"  ; (˜) small tilde
-
-
 ; Compose :  Hook and Horn (h)
 
-global cmpHook := Map()
-cmpHook["b"] := "{u+0253}"  ; (ɓ) b with hook
-cmpHook["B"] := "{u+0181}"  ; (Ɓ) B with hook
-cmpHook["c"] := "{u+0188}"  ; (ƈ) c with hook
-cmpHook["C"] := "{u+0187}"  ; (Ƈ) C with hook
-cmpHook["d"] := "{u+0257}"  ; (ɗ) d with hook
-cmpHook["D"] := "{u+018a}"  ; (Ɗ) D with hook
-cmpHook["f"] := "{u+0192}"  ; (ƒ) f with hook
-cmpHook["F"] := "{u+0191}"  ; (Ƒ) F with hook
-cmpHook["g"] := "{u+0260}"  ; (É ) g with hook
-cmpHook["G"] := "{u+0193}"  ; (Ɠ) G with hook
-cmpHook["h"] := "{u+0266}"  ; (ɦ) h with hook
-cmpHook["H"] := "{u+a7aa}"  ; (Ɦ) H with hook
-cmpHook["j"] := "{u+0267}"  ; (ɧ) small letter heng with hook
-cmpHook["k"] := "{u+0199}"  ; (ƙ) k with hook
-cmpHook["K"] := "{u+0198}"  ; (Ƙ) K with hook
-cmpHook["m"] := "{u+0271}"  ; (ɱ) m with hook
-cmpHook["M"] := "{u+2c6e}"  ; (â±®) M with hook
-cmpHook["n"] := "{u+0272}"  ; (ɲ) n with left hook
-cmpHook["N"] := "{u+019d}"  ; (Ɲ) N with left hook
-cmpHook["o"] := "{u+01a1}"  ; (Æ¡) o with horn
-cmpHook["O"] := "{u+01a0}"  ; (Æ ) O with horn
-cmpHook["p"] := "{u+01a5}"  ; (Æ¥) p with hook
-cmpHook["P"] := "{u+01a4}"  ; (Ƥ) P with hook
-cmpHook["q"] := "{u+024b}"  ; (ɋ) q with hook tail
-cmpHook["Q"] := "{u+024a}"  ; (Ɋ) Q with hook tail
-cmpHook["r"] := "{u+027d}"  ; (ɽ) r with tail
-cmpHook["R"] := "{u+2c64}"  ; (Ɽ) R with tail
-cmpHook["t"] := "{u+01ad}"  ; (Æ­) t with hook
-cmpHook["T"] := "{u+01ac}"  ; (Ƭ) T with hook
-cmpHook["u"] := "{u+01b0}"  ; (Æ°) u with horn
-cmpHook["U"] := "{u+01af}"  ; (Ư) U with horn
-cmpHook["v"] := "{u+028b}"  ; (ʋ) v with hook
-cmpHook["V"] := "{u+01b2}"  ; (Ʋ) V with hook
-cmpHook["w"] := "{u+2c73}"  ; (â±³) w with hook
-cmpHook["W"] := "{u+2c72}"  ; (â±²) W with hook
-cmpHook["y"] := "{u+01b4}"  ; (Æ´) y with hook
-cmpHook["Y"] := "{u+01b3}"  ; (Ƴ) Y with hook
-cmpHook["z"] := "{u+0225}"  ; (È¥) z with hook
-cmpHook["Z"] := "{u+0224}"  ; (Ȥ) Z with hook
+global cmpSmallH := Map()
+cmpSmallH["b"] := "{u+0253}"  ; (ɓ) b with hook
+cmpSmallH["B"] := "{u+0181}"  ; (Ɓ) B with hook
+cmpSmallH["c"] := "{u+0188}"  ; (ƈ) c with hook
+cmpSmallH["C"] := "{u+0187}"  ; (Ƈ) C with hook
+cmpSmallH["d"] := "{u+0257}"  ; (ɗ) d with hook
+cmpSmallH["D"] := "{u+018a}"  ; (Ɗ) D with hook
+cmpSmallH["e"] := "{u+025a}"  ; (ɚ) small letter schwa with hook
+cmpSmallH["f"] := "{u+0192}"  ; (ƒ) f with hook
+cmpSmallH["F"] := "{u+0191}"  ; (Ƒ) F with hook
+cmpSmallH["g"] := "{u+0260}"  ; (É ) g with hook
+cmpSmallH["G"] := "{u+0193}"  ; (Ɠ) G with hook
+cmpSmallH["h"] := "{u+0266}"  ; (ɦ) h with hook
+cmpSmallH["H"] := "{u+a7aa}"  ; (Ɦ) H with hook
+cmpSmallH["j"] := "{u+0267}"  ; (ɧ) small letter heng with hook
+cmpSmallH["k"] := "{u+0199}"  ; (ƙ) k with hook
+cmpSmallH["K"] := "{u+0198}"  ; (Ƙ) K with hook
+cmpSmallH["m"] := "{u+0271}"  ; (ɱ) m with hook
+cmpSmallH["M"] := "{u+2c6e}"  ; (â±®) M with hook
+cmpSmallH["n"] := "{u+0272}"  ; (ɲ) n with left hook
+cmpSmallH["N"] := "{u+019d}"  ; (Ɲ) N with left hook
+cmpSmallH["o"] := "{u+01a1}"  ; (Æ¡) o with horn
+cmpSmallH["O"] := "{u+01a0}"  ; (Æ ) O with horn
+cmpSmallH["p"] := "{u+01a5}"  ; (Æ¥) p with hook
+cmpSmallH["P"] := "{u+01a4}"  ; (Ƥ) P with hook
+cmpSmallH["q"] := "{u+024b}"  ; (ɋ) q with hook tail
+cmpSmallH["Q"] := "{u+024a}"  ; (Ɋ) Q with hook tail
+cmpSmallH["r"] := "{u+027d}"  ; (ɽ) r with tail
+cmpSmallH["R"] := "{u+2c64}"  ; (Ɽ) R with tail
+cmpSmallH["s"] := "{u+0282}"  ; (ʂ) s with hook
+cmpSmallH["t"] := "{u+01ad}"  ; (Æ­) t with hook
+cmpSmallH["T"] := "{u+01ac}"  ; (Ƭ) T with hook
+cmpSmallH["u"] := "{u+01b0}"  ; (Æ°) u with horn
+cmpSmallH["U"] := "{u+01af}"  ; (Ư) U with horn
+cmpSmallH["v"] := "{u+028b}"  ; (ʋ) v with hook
+cmpSmallH["V"] := "{u+01b2}"  ; (Ʋ) V with hook
+cmpSmallH["w"] := "{u+2c73}"  ; (â±³) w with hook
+cmpSmallH["W"] := "{u+2c72}"  ; (â±²) W with hook
+cmpSmallH["y"] := "{u+01b4}"  ; (Æ´) y with hook
+cmpSmallH["Y"] := "{u+01b3}"  ; (Ƴ) Y with hook
+cmpSmallH["z"] := "{u+0225}"  ; (È¥) z with hook
+cmpSmallH["Z"] := "{u+0224}"  ; (Ȥ) Z with hook
+
+
+; Compose :  Retroflex Hook, Right Hook, Crossed-Tail and Variations (f)
+
+global cmpSmallF := Map()
+cmpSmallF["d"] := "{u+1d91}"  ; (ᶑ) d with hook and tail
+cmpSmallF["e"] := "{u+025d}"  ; (ɝ) small letter reversed open e with hook
+cmpSmallF["g"] := "{u+ab36}"  ; (ꬶ) small letter script g with crossed-tail
+cmpSmallF["h"] := "{u+a727}"  ; (ꜧ) small letter heng
+cmpSmallF["H"] := "{u+a726}"  ; (Ꜧ) capital letter heng
+cmpSmallF["j"] := "{u+029d}"  ; (ʝ) j with crossed-tail
+cmpSmallF["l"] := "{u+026d}"  ; (É­) l with retroflex hook
+cmpSmallF["n"] := "{u+0273}"  ; (ɳ) n with retroflex hook
+cmpSmallF["r"] := "{u+027e}"  ; (ɾ) r with fishhook
+cmpSmallF["t"] := "{u+0288}"  ; (ʈ) t with retroflex hook
+cmpSmallF["T"] := "{u+01ae}"  ; (Æ®) T with retroflex hook
+cmpSmallF["v"] := "{u+2c71}"  ; (â±±) v with right hook
+cmpSmallF["w"] := "{u+2c73}"  ; (â±³) w with right hook
+cmpSmallF["W"] := "{u+2c72}"  ; (â±²) W with right hook
+cmpSmallF["z"] := "{u+0290}"  ; (ʐ) z with retroflex hook
 
 
 ; Compose :  Latin Greek Letters and Variations (l)
 
-global cmpLatinGreek := Map()
-cmpLatinGreek["a"] := "{u+0251}"  ; (ɑ) Latin small letter alpha
-cmpLatinGreek["A"] := "{u+2c6d}"  ; (â±­) Latin capital letter alpha
-cmpLatinGreek["c"] := "{u+ab36}"  ; (ꬶ) small letter script g with crossed-tail
-cmpLatinGreek["e"] := "{u+025b}"  ; (ɛ) small letter open e (Latin small epsilon)
-cmpLatinGreek["E"] := "{u+0190}"  ; (Ɛ) capital letter open E (Latin capital epsilon)
-cmpLatinGreek["f"] := "{u+017f}"  ; (Å¿) small letter long s
-cmpLatinGreek["F"] := "{u+1e9b}"  ; (ẛ) long s with dot above
-cmpLatinGreek["g"] := "{u+0263}"  ; (É£) Latin small letter gamma
-cmpLatinGreek["G"] := "{u+0194}"  ; (Ɣ) Latin capital letter gamma
-cmpLatinGreek["h"] := "{u+a727}"  ; (ꜧ) small letter heng
-cmpLatinGreek["H"] := "{u+a726}"  ; (Ꜧ) capital letter heng
-cmpLatinGreek["i"] := "{u+0269}"  ; (É©) Latin small letter iota
-cmpLatinGreek["I"] := "{u+0196}"  ; (Ɩ) Latin capital letter iota
-cmpLatinGreek["k"] := "{u+0138}"  ; (ĸ) small letter kra
-cmpLatinGreek["o"] := "{u+0254}"  ; (ɔ) small letter open o
-cmpLatinGreek["O"] := "{u+0186}"  ; (Ɔ) capital letter open O
-cmpLatinGreek["s"] := "{u+0283}"  ; (ʃ) small letter esh
-cmpLatinGreek["S"] := "{u+01a9}"  ; (Æ©) capital letter esh
-cmpLatinGreek["u"] := "{u+028a}"  ; (ʊ) Latin small letter upsilon
-cmpLatinGreek["U"] := "{u+01b1}"  ; (Ʊ) Latin capital letter upsilon
-
-
-; Compose :  Turned Letters (t)
-
-global cmpTurned := Map()
-cmpTurned["a"] := "{u+0250}"  ; (ɐ) Latin small letter turned a
-cmpTurned["A"] := "{u+2c6f}"  ; (Ɐ) Latin capital letter turned A
-cmpTurned["e"] := "{u+01dd}"  ; (ǝ) Latin small letter turned e
-cmpTurned["E"] := "{u+018e}"  ; (Ǝ) Latin capital letter reversed E
-cmpTurned["q"] := "{u+0252}"  ; (ɒ) Latin small letter turned alpha
-cmpTurned["Q"] := "{u+2c70}"  ; (â±°) Latin capital letter turned alpha
-cmpTurned["v"] := "{u+028c}"  ; (ʌ) Latin small letter turned v
-cmpTurned["V"] := "{u+0245}"  ; (Ʌ) Latin capital letter turned V
-cmpTurned["y"] := "{u+028e}"  ; (ʎ) Latin small letter turned y
+global cmpSmallL := Map()
+cmpSmallL["a"] := "{u+0251}"  ; (ɑ) Latin small letter alpha
+cmpSmallL["A"] := "{u+2c6d}"  ; (â±­) Latin capital letter alpha
+cmpSmallL["b"] := "{u+025e}"  ; (ɞ) small letter closed reversed open e
+cmpSmallL["d"] := "{u+1e9f}"  ; (ẟ) Latin small letter delta
+cmpSmallL["e"] := "{u+025b}"  ; (ɛ) small letter open e (Latin small epsilon)
+cmpSmallL["E"] := "{u+0190}"  ; (Ɛ) capital letter open E (Latin capital epsilon)
+cmpSmallL["f"] := "{u+0278}"  ; (ɸ) Latin small letter phi
+cmpSmallL["g"] := "{u+0261}"  ; (É¡) small letter script g
+cmpSmallL["G"] := "{u+a7ac}"  ; (Ɡ) capital letter script G
+cmpSmallL["h"] := "{u+01a3}"  ; (Æ£) small letter gha
+cmpSmallL["H"] := "{u+01a2}"  ; (Æ¢) capital letter gha
+cmpSmallL["i"] := "{u+0269}"  ; (É©) Latin small letter iota
+cmpSmallL["I"] := "{u+0196}"  ; (Ɩ) Latin capital letter iota
+cmpSmallL["j"] := "{u+0263}"  ; (É£) Latin small letter gamma
+cmpSmallL["J"] := "{u+0194}"  ; (Ɣ) Latin capital letter gamma
+cmpSmallL["k"] := "{u+0138}"  ; (ĸ) small letter kra
+cmpSmallL["l"] := "{u+019b}"  ; (ƛ) Latin small letter lambda with stroke (barred lambda)
+cmpSmallL["m"] := "{u+0270}"  ; (É°) small letter turned m with long leg
+cmpSmallL["n"] := "{u+019e}"  ; (ƞ) small letter n with long right leg
+cmpSmallL["N"] := "{u+0220}"  ; (È ) capital letter N with long right leg
+cmpSmallL["o"] := "{u+0254}"  ; (ɔ) small letter open o
+cmpSmallL["O"] := "{u+0186}"  ; (Ɔ) capital letter open O
+cmpSmallL["q"] := "{u+0277}"  ; (É·) Latin small letter closed omega
+cmpSmallL["s"] := "{u+0283}"  ; (ʃ) small letter esh
+cmpSmallL["S"] := "{u+01a9}"  ; (Æ©) capital letter esh
+cmpSmallL["u"] := "{u+028a}"  ; (ʊ) Latin small letter upsilon
+cmpSmallL["U"] := "{u+01b1}"  ; (Ʊ) Latin capital letter upsilon
+
+
+; Compose :  Turned Letters (r)
+
+global cmpSmallR := Map()
+cmpSmallR["a"] := "{u+0250}"  ; (ɐ) small letter turned a
+cmpSmallR["A"] := "{u+2c6f}"  ; (Ɐ) capital letter turned A
+cmpSmallR["b"] := "{u+025c}"  ; (ɜ) small letter reversed open e
+cmpSmallR["d"] := "{u+018d}"  ; (ƍ) Latin small letter turned delta
+cmpSmallR["e"] := "{u+01dd}"  ; (ǝ) small letter turned e
+cmpSmallR["E"] := "{u+018e}"  ; (Ǝ) capital letter reversed E
+cmpSmallR["f"] := "{u+0258}"  ; (ɘ) small letter reversed e
+cmpSmallR["g"] := "{u+1d77}"  ; (áµ·) small letter turned g
+cmpSmallR["G"] := "{u+2141}"  ; (⅁) capital letter turned G
+cmpSmallR["h"] := "{u+0265}"  ; (É¥) small letter turned h
+cmpSmallR["H"] := "{u+a78d}"  ; (Ɥ) capital letter turned H
+cmpSmallR["i"] := "{u+1d09}"  ; (ᴉ) small letter turned i
+cmpSmallR["k"] := "{u+029e}"  ; (ʞ) small letter turned k
+cmpSmallR["K"] := "{u+a7b0}"  ; (Ʞ) capital letter turned K
+cmpSmallR["m"] := "{u+026f}"  ; (ɯ) small letter turned m
+cmpSmallR["M"] := "{u+019c}"  ; (Ɯ) capital letter turned M
+cmpSmallR["o"] := "{u+0264}"  ; (ɤ) small letter ram's horn (baby gamma)
+cmpSmallR["q"] := "{u+0252}"  ; (ɒ) Latin small letter turned alpha
+cmpSmallR["Q"] := "{u+2c70}"  ; (â±°) Latin capital letter turned alpha
+cmpSmallR["r"] := "{u+0279}"  ; (ɹ) small letter turned r
+cmpSmallR["t"] := "{u+0287}"  ; (ʇ) small letter turned t
+cmpSmallR["v"] := "{u+028c}"  ; (ʌ) small letter turned v
+cmpSmallR["V"] := "{u+0245}"  ; (Ʌ) capital letter turned V
+cmpSmallR["w"] := "{u+028d}"  ; (ʍ) small letter turned w
+cmpSmallR["y"] := "{u+028e}"  ; (ʎ) small letter turned y
 
 
 ; Compose :  Currency Symbols ($)
@@ -724,24 +749,25 @@ cmpSubscript[")"] := "{u+208e}"  ; (₎) subscript )
 
 global cmpSpace := Map()
 global cmpQuad := Map()
+cmpSpace["1"] := "{u+2004}"  ; three-per-em space
 cmpSpace["2"] := "{u+2002}"  ; en space
 cmpSpace["3"] := "{u+2003}"  ; em space
-cmpSpace["1"] := "{u+2004}"  ; three-per-em space
 cmpSpace["4"] := "{u+2005}"  ; four-per-em space
 cmpSpace["5"] := "{u+2008}"  ; punctuation space
 cmpSpace["6"] := "{u+2006}"  ; six-per-em space
 cmpSpace["7"] := "{u+2009}"  ; thin space
 cmpSpace["8"] := "{u+200a}"  ; hair space
 cmpSpace["9"] := "{u+2007}"  ; figure space
-cmpSpace["0"] := "{u+200b}"  ; zero-width space
-cmpSpace[" "] := "{u+00a0}"  ; non-breaking space
-cmpSpace["."] := "{u+202f}"  ; narrow no-break space
+cmpSpace["0"] := "{u+200b}"  ; zero-width space (ZWSP)
+cmpSpace["m"] := "{u+205f}"  ; medium mathematical space (MMSP)
+cmpSpace[" "] := "{u+00a0}"  ; non-breaking space (NBSP)
+cmpSpace["."] := "{u+202f}"  ; narrow no-break space (NNBSP)
 cmpMacronStroke["2"] := "{u+2013}"  ; (–) en dash
 cmpMacronStroke["3"] := "{u+2014}"  ; (—) em dash
 cmpMacronStroke["4"] := "{u+2015}"  ; (―) horizontal bar
 cmpMacronStroke["5"] := "{u+2010}"  ; (‐) hyphen
 cmpMacronStroke["9"] := "{u+2012}"  ; (‒) figure dash
-cmpMacronStroke["0"] := "{u+00ad}"  ; (­) soft hyphen
+cmpMacronStroke["0"] := "{u+00ad}"  ; (­) soft hyphen (SHY)
 cmpMacronStroke["-"] := "{u+2011}"  ; (‑) non-breaking hyphen
 cmpQuad["2"] := "{u+2000}"  ; en quad
 cmpQuad["3"] := "{u+2001}"  ; em quad
@@ -784,7 +810,8 @@ cmpDoubleAcute["0"] := "{u+21d4}"  ; (⇔) left right double arrow
 
 global cmpSymbols := Map()
 cmpSymbols["a"] := "{u+214d}"  ; (⅍) aktieselskab
-cmpSymbols["b"] := "{u+2e18}"  ; (⸘) inverted interrobang
+cmpSymbols["b"] := "{u+203d}"  ; (‽) interrobang
+cmpSymbols["B"] := "{u+2e18}"  ; (⸘) inverted interrobang
 cmpSymbols["c"] := "{u+2105}"  ; (℅) care of
 cmpSymbols["d"] := "{u+22c4}"  ; (⋄) diamond operator
 cmpSymbols["e"] := "{u+212e}"  ; (℮) estimated symbol
@@ -795,14 +822,15 @@ cmpSymbols["l"] := "{u+2113}"  ; (ℓ) script small l
 cmpSymbols["L"] := "{u+2112}"  ; (ℒ) Laplace transform
 cmpSymbols["m"] := "{u+2642}"  ; (♂) male sign (Mars)
 cmpSymbols["M"] := "{u+2120}"  ; (℠) service mark
-cmpSymbols["q"] := "{u+2e2e}"  ; (⸮) reversed question mark
 cmpSymbols["r"] := "{u+211e}"  ; (℞) prescription take (Recipere)
 cmpSymbols["R"] := "{u+211e}"  ; (℞) prescription take (Recipere)
+cmpSymbols["x"] := "{u+203b}"  ; (※) reference mark
 cmpSymbols["2"] := "{u+266b}"  ; (♫) beamed eighth notes
 cmpSymbols["3"] := "{u+2042}"  ; (⁂) asterism
+cmpSymbols["4"] := "{u+203b}"  ; (※) reference mark
 cmpSymbols["8"] := "{u+266a}"  ; (♪) eighth note
 cmpSymbols["!"] := "{u+203c}"  ; (‼) double exclamation mark
-cmpSymbols["?"] := "{u+203d}"  ; (‽) interrobang
+cmpSymbols["?"] := "{u+2e2e}"  ; (⸮) reversed question mark
 cmpSymbols["\"] := "{u+205e}"  ; (⁞) vertical four dots
 cmpSymbols["|"] := "{u+00a6}"  ; (¦) broken bar
 
@@ -878,11 +906,13 @@ global cmpSmallN := Map()
 global cmpCapitalN := Map()
 global cmpCapitalO := Map()
 global cmpCapitalS := Map()
+global cmpSmallT := Map()
 global cmpCapitalT := Map()
 cmpArrow["e"] := "{u+00e6}"      ; (æ) letter ae
 cmpCapitalA["E"] := "{u+00c6}"   ; (Æ) letter AE
 cmpSmallD["h"] := "{u+00f0}"     ; (ð) small letter eth
 cmpCapitalD["H"] := "{u+00d0}"   ; (Ð) capital letter eth
+cmpSmallF["s"] := "{u+017f}"     ; (Å¿) small letter long s
 cmpSmallI["j"] := "{u+0133}"     ; (ij) ligature ij
 cmpCapitalI["J"] := "{u+0132}"   ; (IJ) ligature IJ
 cmpSmallN["g"] := "{u+014b}"     ; (ŋ) small letter eng(ma)
@@ -891,7 +921,7 @@ cmpRingAbove["e"] := "{u+0153}"  ; (œ) ligature oe
 cmpCapitalO["E"] := "{u+0152}"   ; (Œ) ligature OE
 cmpSymbols["s"] := "{u+00df}"    ; (ß) small sharp s (Eszett)
 cmpCapitalS["S"] := "{u+1e9e}"   ; (ẞ) capital sharp S (capital Eszett)
-cmpTurned["h"] := "{u+00fe}"     ; (þ) small letter thorn
+cmpSmallT["h"] := "{u+00fe}"     ; (þ) small letter thorn
 cmpCapitalT["H"] := "{u+00de}"   ; (Þ) capital letter thorn
 
 
@@ -899,7 +929,6 @@ cmpCapitalT["H"] := "{u+00de}"   ; (Þ) capital letter thorn
 
 global cmpDigitEight := Map()
 global cmpCapitalP := Map()
-global cmpSmallR := Map()
 global cmpSemicolon := Map()
 global cmpAsterisk := Map()
 global cmpExclam := Map()
@@ -924,12 +953,15 @@ cmpSmallR["3"] := "{u+221b}"        ; (∛) cube root
 cmpSmallR["4"] := "{u+221c}"        ; (∜) fourth root
 cmpSymbols["o"] := "{u+00a7}"       ; (§) section sign
 cmpCapitalS["o"] := "{u+00a7}"      ; (§) section sign
-cmpTurned["m"] := "{u+2122}"        ; (™) trademark symbol
+cmpSmallT["m"] := "{u+2122}"        ; (™) trademark symbol
 cmpSemicolon["b"] := "{u+2022}"     ; (•) bullet
 cmpSemicolon[";"] := "{u+2022}"     ; (•) bullet
 cmpSemicolon["t"] := "{u+2023}"     ; (‣) triangular bullet
+cmpSemicolon[">"] := "{u+2023}"     ; (‣) triangular bullet
 cmpSemicolon["h"] := "{u+2043}"     ; (⁃) hyphen bullet
+cmpSemicolon["-"] := "{u+2043}"     ; (⁃) hyphen bullet
 cmpSemicolon["w"] := "{u+25e6}"     ; (◦) white bullet
+cmpSemicolon["o"] := "{u+25e6}"     ; (◦) white bullet
 cmpAcuteAccent["1"] := "{u+2032}"   ; (′) prime
 cmpAcuteAccent["2"] := "{u+2033}"   ; (″) double prime
 cmpAcuteAccent["3"] := "{u+2034}"   ; (‴) triple prime
@@ -999,6 +1031,7 @@ cmpDigitZero["3"] := "{u+2189}"   ; (↉) vulgar fraction 0/3
 
 global cmpBracketLeft := Map()
 global cmpBracketRight := Map()
+global cmpBackslash := Map()
 cmpCedillaOgonek[chr(34)] := "{u+201e}"  ; („) double low-9 quotation mark
 cmpDiaeresis[","] := "{u+201e}"          ; („) double low-9 quotation mark
 cmpCedillaOgonek["'"] := "{u+201a}"      ; (‚) single low-9 quotation mark
@@ -1011,6 +1044,10 @@ cmpAcuteAccent["["] := "{u+2018}"        ; (‘) left single quotation mark
 cmpBracketLeft["'"] := "{u+2018}"        ; (‘) left single quotation mark
 cmpAcuteAccent["]"] := "{u+2019}"        ; (’) right single quotation mark
 cmpBracketRight["'"] := "{u+2019}"       ; (’) right single quotation mark
+cmpBackslash[chr(34)] := "{u+201f}"      ; (‟) double high-reversed-9 quotation mark
+cmpDiaeresis["\"] := "{u+201f}"          ; (‟) double high-reversed-9 quotation mark
+cmpBackslash["'"] := "{u+201b}"          ; (‛) single high-reversed-9 quotation mark
+cmpAcuteAccent["\"] := "{u+201b}"        ; (‛) single high-reversed-9 quotation mark
 cmpLessThan["<"] := "{u+00ab}"           ; («) left-pointing double angle quotation mark
 cmpLessThan[chr(34)] := "{u+00ab}"       ; («) left-pointing double angle quotation mark
 cmpDiaeresis["<"] := "{u+00ab}"          ; («) left-pointing double angle quotation mark
@@ -1023,42 +1060,155 @@ cmpGreaterThan["'"] := "{u+203a}"        ; (›) right-pointing single angle quo
 cmpAcuteAccent[">"] := "{u+203a}"        ; (›) right-pointing single angle quotation mark
 
 
-; Compose :  Letters with Two Diacritical Marks
+; Compose :  Double Grave Accent (G)
+
+global cmpCapitalG := Map()
+cmpCapitalG["a"] := "{u+0201}"  ; (ȁ) a with double grave
+cmpCapitalG["A"] := "{u+0200}"  ; (Ȁ) A with double grave
+cmpCapitalG["e"] := "{u+0205}"  ; (ȅ) e with double grave
+cmpCapitalG["E"] := "{u+0204}"  ; (Ȅ) E with double grave
+cmpCapitalG["i"] := "{u+0209}"  ; (ȉ) i with double grave
+cmpCapitalG["I"] := "{u+0208}"  ; (Ȉ) I with double grave
+cmpCapitalG["o"] := "{u+020d}"  ; (ȍ) o with double grave
+cmpCapitalG["O"] := "{u+020c}"  ; (Ȍ) O with double grave
+cmpCapitalG["r"] := "{u+0211}"  ; (ȑ) r with double grave
+cmpCapitalG["R"] := "{u+0210}"  ; (Ȑ) R with double grave
+cmpCapitalG["u"] := "{u+0215}"  ; (ȕ) u with double grave
+cmpCapitalG["U"] := "{u+0214}"  ; (Ȕ) U with double grave
 
-global cmpCapitalC := Map()
-global cmpSmallE := Map()
-global cmpCapitalE := Map()
-global cmpCapitalV := Map()
-cmpArrow[chr(34)] := "{u+01df}"      ; (ǟ) a with diaeresis and macron
-cmpCapitalA[chr(34)] := "{u+01de}"   ; (Ǟ) A with diaeresis and macron
-cmpArrow["."] := "{u+01e1}"          ; (Ç¡) a with dot above and macron
-cmpCapitalA["."] := "{u+01e0}"       ; (Ç ) A with dot above and macron
-cmpArrow["'"] := "{u+01fb}"          ; (Ç») a with ring above and acute
-cmpCapitalA["'"] := "{u+01fa}"       ; (Ǻ) A with ring above and acute
-cmpCircumflex["'"] := "{u+1e09}"     ; (ḉ) c with cedilla and acute
-cmpCapitalC["'"] := "{u+1e08}"       ; (Ḉ) C with cedilla and acute
-cmpSmallE["-"] := "{u+01e3}"         ; (Ç£) ae with macron
-cmpCapitalE["-"] := "{u+01e2}"       ; (Ç¢) AE with macron
-cmpSmallE["'"] := "{u+01fd}"         ; (ǽ) ae with acute
-cmpCapitalE["'"] := "{u+01fc}"       ; (Ǽ) AE with acute
-cmpRingAbove[","] := "{u+01ed}"      ; (Ç­) o with ogonek and macron
-cmpCapitalO[","] := "{u+01ec}"       ; (Ǭ) O with ogonek and macron
-cmpRingAbove["'"] := "{u+01ff}"      ; (Ç¿) o with stroke and acute
-cmpCapitalO["'"] := "{u+01fe}"       ; (Ǿ) O with stroke and acute
-cmpRingAbove[chr(34)] := "{u+022b}"  ; (È«) o with diaeresis and macron
-cmpCapitalO[chr(34)] := "{u+022a}"   ; (Ȫ) O with diaeresis and macron
-cmpRingAbove["~"] := "{u+022d}"      ; (È­) o with tilde and macron
-cmpCapitalO["~"] := "{u+022c}"       ; (Ȭ) O with tilde and macron
-cmpRingAbove["."] := "{u+0231}"      ; (ȱ) o with dot above and macron
-cmpCapitalO["."] := "{u+0230}"       ; (È°) O with dot above and macron
-cmpCaron["-"] := "{u+01d6}"          ; (ǖ) u with diaeresis and macron
-cmpCapitalV["-"] := "{u+01d5}"       ; (Ǖ) U with diaeresis and macron
-cmpCaron["'"] := "{u+01d8}"          ; (ǘ) u with diaeresis and acute
-cmpCapitalV["'"] := "{u+01d7}"       ; (Ǘ) U with diaeresis and acute
-cmpCaron["v"] := "{u+01da}"          ; (ǚ) u with diaeresis and caron
-cmpCapitalV["v"] := "{u+01d9}"       ; (Ǚ) U with diaeresis and caron
-cmpCaron["``"] := "{u+01dc}"         ; (ǜ) u with diaeresis and grave
-cmpCapitalV["``"] := "{u+01db}"      ; (Ǜ) U with diaeresis and grave
+
+; Compose :  Inverted Breve (B)
+
+global cmpCapitalB := Map()
+cmpCapitalB["a"] := "{u+0203}"  ; (ȃ) a with inverted breve
+cmpCapitalB["A"] := "{u+0202}"  ; (Ȃ) A with inverted breve
+cmpCapitalB["e"] := "{u+0207}"  ; (ȇ) e with inverted breve
+cmpCapitalB["E"] := "{u+0206}"  ; (Ȇ) E with inverted breve
+cmpCapitalB["i"] := "{u+020b}"  ; (ȋ) i with inverted breve
+cmpCapitalB["I"] := "{u+020a}"  ; (Ȋ) I with inverted breve
+cmpCapitalB["o"] := "{u+020f}"  ; (ȏ) o with inverted breve
+cmpCapitalB["O"] := "{u+020e}"  ; (Ȏ) O with inverted breve
+cmpCapitalB["r"] := "{u+0213}"  ; (ȓ) r with inverted breve
+cmpCapitalB["R"] := "{u+0212}"  ; (Ȓ) R with inverted breve
+cmpCapitalB["u"] := "{u+0217}"  ; (ȗ) u with inverted breve
+cmpCapitalB["U"] := "{u+0216}"  ; (Ȗ) U with inverted breve
+
+
+; Compose :  Circumflex Below (I)
+
+cmpCapitalI["d"] := "{u+1e13}"  ; (ḓ) d with circumflex below
+cmpCapitalI["D"] := "{u+1e12}"  ; (Ḓ) D with circumflex below
+cmpCapitalI["e"] := "{u+1e19}"  ; (ḙ) e with circumflex below
+cmpCapitalI["E"] := "{u+1e18}"  ; (Ḙ) E with circumflex below
+cmpCapitalI["l"] := "{u+1e3d}"  ; (ḽ) l with circumflex below
+cmpCapitalI["L"] := "{u+1e3c}"  ; (Ḽ) L with circumflex below
+cmpCapitalI["n"] := "{u+1e4b}"  ; (ṋ) n with circumflex below
+cmpCapitalI["N"] := "{u+1e4a}"  ; (Ṋ) N with circumflex below
+cmpCapitalI["t"] := "{u+1e71}"  ; (á¹±) t with circumflex below
+cmpCapitalI["T"] := "{u+1e70}"  ; (á¹°) T with circumflex below
+cmpCapitalI["u"] := "{u+1e77}"  ; (á¹·) u with circumflex below
+cmpCapitalI["U"] := "{u+1e76}"  ; (Ṷ) U with circumflex below
+
+
+; Compose :  Tilde Below (T)
+
+cmpCapitalT["e"] := "{u+1e1b}"  ; (ḛ) e with tilde below
+cmpCapitalT["E"] := "{u+1e1a}"  ; (Ḛ) E with tilde below
+cmpCapitalT["i"] := "{u+1e2d}"  ; (ḭ) i with tilde below
+cmpCapitalT["I"] := "{u+1e2c}"  ; (Ḭ) I with tilde below
+cmpCapitalT["u"] := "{u+1e75}"  ; (á¹µ) u with tilde below
+cmpCapitalT["U"] := "{u+1e74}"  ; (á¹´) U with tilde below
+
+
+; Compose :  Line Below (L)
+
+global cmpCapitalL := Map()
+cmpCapitalL["b"] := "{u+1e07}"  ; (ḇ) b with line below
+cmpCapitalL["B"] := "{u+1e06}"  ; (Ḇ) B with line below
+cmpCapitalL["d"] := "{u+1e0f}"  ; (ḏ) d with line below
+cmpCapitalL["D"] := "{u+1e0e}"  ; (Ḏ) D with line below
+cmpCapitalL["h"] := "{u+1e96}"  ; (ẖ) h with line below
+cmpCapitalL["k"] := "{u+1e35}"  ; (ḵ) k with line below
+cmpCapitalL["K"] := "{u+1e34}"  ; (Ḵ) K with line below
+cmpCapitalL["l"] := "{u+1e3b}"  ; (ḻ) l with line below
+cmpCapitalL["L"] := "{u+1e3a}"  ; (Ḻ) L with line below
+cmpCapitalL["n"] := "{u+1e49}"  ; (ṉ) n with line below
+cmpCapitalL["N"] := "{u+1e48}"  ; (Ṉ) N with line below
+cmpCapitalL["r"] := "{u+1e5f}"  ; (ṟ) r with line below
+cmpCapitalL["R"] := "{u+1e5e}"  ; (Ṟ) R with line below
+cmpCapitalL["t"] := "{u+1e6f}"  ; (ṯ) t with line below
+cmpCapitalL["T"] := "{u+1e6e}"  ; (á¹®) T with line below
+cmpCapitalL["z"] := "{u+1e95}"  ; (ẕ) z with line below
+cmpCapitalL["Z"] := "{u+1e94}"  ; (Ẕ) Z with line below
+
+
+; Compose :  Ring Below, Breve Below and Diaeresis Below (R)
+
+global cmpCapitalR := Map()
+cmpCapitalR["a"] := "{u+1e01}"  ; (ḁ) a with ring below
+cmpCapitalR["A"] := "{u+1e00}"  ; (Ḁ) A with ring below
+cmpCapitalR["h"] := "{u+1e2b}"  ; (ḫ) h with breve below
+cmpCapitalR["H"] := "{u+1e2a}"  ; (Ḫ) H with breve below
+cmpCapitalR["u"] := "{u+1e73}"  ; (á¹³) u with diaeresis below
+cmpCapitalR["U"] := "{u+1e72}"  ; (á¹²) U with diaeresis below
+
+
+; Compose :  Hook Above (<)
+
+cmpLessThan["a"] := "{u+1ea3}"  ; (ả) a with hook above
+cmpLessThan["A"] := "{u+1ea2}"  ; (Ả) A with hook above
+cmpLessThan["e"] := "{u+1ebb}"  ; (ẻ) e with hook above
+cmpLessThan["E"] := "{u+1eba}"  ; (Ẻ) E with hook above
+cmpLessThan["i"] := "{u+1ec9}"  ; (ỉ) i with hook above
+cmpLessThan["I"] := "{u+1ec8}"  ; (Ỉ) I with hook above
+cmpLessThan["o"] := "{u+1ecf}"  ; (ỏ) o with hook above
+cmpLessThan["O"] := "{u+1ece}"  ; (Ỏ) O with hook above
+cmpLessThan["u"] := "{u+1ee7}"  ; (ủ) u with hook above
+cmpLessThan["U"] := "{u+1ee6}"  ; (Ủ) U with hook above
+cmpLessThan["y"] := "{u+1ef7}"  ; (á»·) y with hook above
+cmpLessThan["Y"] := "{u+1ef6}"  ; (Ỷ) Y with hook above
+
+
+; Compose :  Dot Below (>)
+
+cmpGreaterThan["a"] := "{u+1ea1}"  ; (ạ) a with dot below
+cmpGreaterThan["A"] := "{u+1ea0}"  ; (Ạ) A with dot below
+cmpGreaterThan["b"] := "{u+1e05}"  ; (ḅ) b with dot below
+cmpGreaterThan["B"] := "{u+1e04}"  ; (Ḅ) B with dot below
+cmpGreaterThan["d"] := "{u+1e0d}"  ; (ḍ) d with dot below
+cmpGreaterThan["D"] := "{u+1e0c}"  ; (Ḍ) D with dot below
+cmpGreaterThan["e"] := "{u+1eb9}"  ; (ẹ) e with dot below
+cmpGreaterThan["E"] := "{u+1eb8}"  ; (Ẹ) E with dot below
+cmpGreaterThan["h"] := "{u+1e25}"  ; (ḥ) h with dot below
+cmpGreaterThan["H"] := "{u+1e24}"  ; (Ḥ) H with dot below
+cmpGreaterThan["i"] := "{u+1ecb}"  ; (ị) i with dot below
+cmpGreaterThan["I"] := "{u+1eca}"  ; (Ị) I with dot below
+cmpGreaterThan["k"] := "{u+1e33}"  ; (ḳ) k with dot below
+cmpGreaterThan["K"] := "{u+1e32}"  ; (Ḳ) K with dot below
+cmpGreaterThan["l"] := "{u+1e37}"  ; (ḷ) l with dot below
+cmpGreaterThan["L"] := "{u+1e36}"  ; (Ḷ) L with dot below
+cmpGreaterThan["m"] := "{u+1e43}"  ; (ṃ) m with dot below
+cmpGreaterThan["M"] := "{u+1e42}"  ; (Ṃ) M with dot below
+cmpGreaterThan["n"] := "{u+1e47}"  ; (ṇ) n with dot below
+cmpGreaterThan["N"] := "{u+1e46}"  ; (Ṇ) N with dot below
+cmpGreaterThan["o"] := "{u+1ecd}"  ; (ọ) o with dot below
+cmpGreaterThan["O"] := "{u+1ecc}"  ; (Ọ) O with dot below
+cmpGreaterThan["r"] := "{u+1e5b}"  ; (ṛ) r with dot below
+cmpGreaterThan["R"] := "{u+1e5a}"  ; (Ṛ) R with dot below
+cmpGreaterThan["s"] := "{u+1e63}"  ; (á¹£) s with dot below
+cmpGreaterThan["S"] := "{u+1e62}"  ; (á¹¢) S with dot below
+cmpGreaterThan["t"] := "{u+1e6d}"  ; (á¹­) t with dot below
+cmpGreaterThan["T"] := "{u+1e6c}"  ; (Ṭ) T with dot below
+cmpGreaterThan["u"] := "{u+1ee5}"  ; (ụ) u with dot below
+cmpGreaterThan["U"] := "{u+1ee4}"  ; (Ụ) U with dot below
+cmpGreaterThan["v"] := "{u+1e7f}"  ; (ṿ) v with dot below
+cmpGreaterThan["V"] := "{u+1e7e}"  ; (á¹¾) V with dot below
+cmpGreaterThan["w"] := "{u+1e89}"  ; (ẉ) w with dot below
+cmpGreaterThan["W"] := "{u+1e88}"  ; (Ẉ) W with dot below
+cmpGreaterThan["y"] := "{u+1ef5}"  ; (ỵ) y with dot below
+cmpGreaterThan["Y"] := "{u+1ef4}"  ; (á»´) Y with dot below
+cmpGreaterThan["z"] := "{u+1e93}"  ; (ẓ) z with dot below
+cmpGreaterThan["Z"] := "{u+1e92}"  ; (Ẓ) Z with dot below
 
 
 ; Compose :  Miscellaneous Symbols and Dingbats
@@ -1257,8 +1407,9 @@ cmpDigitEight["m"] := "{u+27be}"  ; (➾) open-outlined rightwards arrow
 cmpDigitEight["n"] := "{u+27c1}"  ; (⟁) white triangle containing small white triangle
 
 
-; Compose :  Chess Symbols (C)
+; Compose :  Chess Pieces and Playing Card Suit Symbols (C)
 
+global cmpCapitalC := Map()
 cmpCapitalC["k"] := "{u+2654}"  ; (♔) white chess king
 cmpCapitalC["q"] := "{u+2655}"  ; (♕) white chess queen
 cmpCapitalC["r"] := "{u+2656}"  ; (♖) white chess rook
@@ -1271,18 +1422,14 @@ cmpCapitalC["R"] := "{u+265c}"  ; (♜) black chess rook
 cmpCapitalC["B"] := "{u+265d}"  ; (♝) black chess bishop
 cmpCapitalC["N"] := "{u+265e}"  ; (♞) black chess knight
 cmpCapitalC["P"] := "{u+265f}"  ; (♟) black chess pawn
-
-
-; Compose :  Playing Card Suit Symbols (S)
-
-cmpCapitalS["c"] := "{u+2663}"  ; (♣) black club suit
-cmpCapitalS["C"] := "{u+2667}"  ; (♧) white club suit
-cmpCapitalS["d"] := "{u+2666}"  ; (♦) black diamond suit
-cmpCapitalS["D"] := "{u+2662}"  ; (♢) white diamond suit
-cmpCapitalS["h"] := "{u+2665}"  ; (♥) black heart suit
-cmpCapitalS["H"] := "{u+2661}"  ; (♡) white heart suit
-cmpCapitalS["p"] := "{u+2660}"  ; (♠) black spade suit
-cmpCapitalS["P"] := "{u+2664}"  ; (♤) white spade suit
+cmpCapitalC["c"] := "{u+2667}"  ; (♧) white club suit
+cmpCapitalC["C"] := "{u+2663}"  ; (♣) black club suit
+cmpCapitalC["d"] := "{u+2662}"  ; (♢) white diamond suit
+cmpCapitalC["D"] := "{u+2666}"  ; (♦) black diamond suit
+cmpCapitalC["h"] := "{u+2661}"  ; (♡) white heart suit
+cmpCapitalC["H"] := "{u+2665}"  ; (♥) black heart suit
+cmpCapitalC["s"] := "{u+2664}"  ; (♤) white spade suit
+cmpCapitalC["S"] := "{u+2660}"  ; (♠) black spade suit
 
 
 ; Compose :  Dingbat Negative Circled Digits (n)
@@ -1729,14 +1876,14 @@ cmpSmallN["0"] := "{u+277f}"  ; (❿) dingbat negative circled digit 10
 >!/::Send "{u+00bf}"   ; (¿) inverted question mark
 >!?::Send "{u+2026}"   ; (…) horizontal ellipsis
 
->!space::Send "{u+00a0}"   ; non-breaking space
->!+space::Send "{u+00a0}"  ; non-breaking space
+>!space::Send "{u+00a0}"   ; non-breaking space (NBSP)
+>!+space::Send "{u+00a0}"  ; non-breaking space (NBSP)
 
 
-; Compose Key Selector
+; Configuration :  Compose Key Selector
 
 >!`::
->!~:: {
+>!sc056:: {
   ihA := InputHook("L1", gEndKeys)
   ihA.Start()
   ihA.Wait()
@@ -1745,10 +1892,30 @@ cmpSmallN["0"] := "{u+277f}"  ; (❿) dingbat negative circled digit 10
   ihB.Start()
   ihB.Wait()
 
-  if (ihA.Input == "c") {
+  if (ihA.Input == "'") {
+    if cmpAcuteAccent.Has(ihB.Input)
+      Send cmpAcuteAccent[ihB.Input]
+  }
+  else if (ihA.Input == "``") {
+    if cmpGraveAccent.Has(ihB.Input)
+      Send cmpGraveAccent[ihB.Input]
+  }
+  else if (ihA.Input == chr(34)) {
+    if cmpDiaeresis.Has(ihB.Input)
+      Send cmpDiaeresis[ihB.Input]
+  }
+  else if (ihA.Input == "c") {
     if cmpCircumflex.Has(ihB.Input)
       Send cmpCircumflex[ihB.Input]
   }
+  else if (ihA.Input == "~") {
+    if cmpTilde.Has(ihB.Input)
+      Send cmpTilde[ihB.Input]
+  }
+  else if (ihA.Input == ",") {
+    if cmpCedillaOgonek.Has(ihB.Input)
+      Send cmpCedillaOgonek[ihB.Input]
+  }
   else if (ihA.Input == "v") {
     if cmpCaron.Has(ihB.Input)
       Send cmpCaron[ihB.Input]
@@ -1773,53 +1940,29 @@ cmpSmallN["0"] := "{u+277f}"  ; (❿) dingbat negative circled digit 10
     if cmpStroke.Has(ihB.Input)
       Send cmpStroke[ihB.Input]
   }
-  else if (ihA.Input == ",") {
-    if cmpCedillaOgonek.Has(ihB.Input)
-      Send cmpCedillaOgonek[ihB.Input]
-  }
   else if (ihA.Input == "b") {
     if cmpBreveSpecial.Has(ihB.Input)
       Send cmpBreveSpecial[ihB.Input]
   }
-  else if (ihA.Input == "B") {
-    if cmpInvertedBreve.Has(ihB.Input)
-      Send cmpInvertedBreve[ihB.Input]
-  }
-  else if (ihA.Input == "'") {
-    if cmpAcuteAccent.Has(ihB.Input)
-      Send cmpAcuteAccent[ihB.Input]
-  }
-  else if (ihA.Input == chr(34)) {
-    if cmpDiaeresis.Has(ihB.Input)
-      Send cmpDiaeresis[ihB.Input]
-  }
   else if (ihA.Input == "=") {
     if cmpDoubleAcute.Has(ihB.Input)
       Send cmpDoubleAcute[ihB.Input]
   }
-  else if (ihA.Input == "``") {
-    if cmpGraveAccent.Has(ihB.Input)
-      Send cmpGraveAccent[ihB.Input]
-  }
-  else if (ihA.Input == "G") {
-    if cmpDoubleGrave.Has(ihB.Input)
-      Send cmpDoubleGrave[ihB.Input]
-  }
-  else if (ihA.Input == "~") {
-    if cmpTilde.Has(ihB.Input)
-      Send cmpTilde[ihB.Input]
-  }
   else if (ihA.Input == "h") {
-    if cmpHook.Has(ihB.Input)
-      Send cmpHook[ihB.Input]
+    if cmpSmallH.Has(ihB.Input)
+      Send cmpSmallH[ihB.Input]
+  }
+  else if (ihA.Input == "f") {
+    if cmpSmallF.Has(ihB.Input)
+      Send cmpSmallF[ihB.Input]
   }
   else if (ihA.Input == "l") {
-    if cmpLatinGreek.Has(ihB.Input)
-      Send cmpLatinGreek[ihB.Input]
+    if cmpSmallL.Has(ihB.Input)
+      Send cmpSmallL[ihB.Input]
   }
-  else if (ihA.Input == "t") {
-    if cmpTurned.Has(ihB.Input)
-      Send cmpTurned[ihB.Input]
+  else if (ihA.Input == "r") {
+    if cmpSmallR.Has(ihB.Input)
+      Send cmpSmallR[ihB.Input]
   }
   else if (ihA.Input == "$") {
     if cmpCurrency.Has(ihB.Input)
@@ -1893,6 +2036,10 @@ cmpSmallN["0"] := "{u+277f}"  ; (❿) dingbat negative circled digit 10
     if cmpCapitalS.Has(ihB.Input)
       Send cmpCapitalS[ihB.Input]
   }
+  else if (ihA.Input == "t") {
+    if cmpSmallT.Has(ihB.Input)
+      Send cmpSmallT[ihB.Input]
+  }
   else if (ihA.Input == "T") {
     if cmpCapitalT.Has(ihB.Input)
       Send cmpCapitalT[ihB.Input]
@@ -1901,10 +2048,6 @@ cmpSmallN["0"] := "{u+277f}"  ; (❿) dingbat negative circled digit 10
     if cmpCapitalP.Has(ihB.Input)
       Send cmpCapitalP[ihB.Input]
   }
-  else if (ihA.Input == "r") {
-    if cmpSmallR.Has(ihB.Input)
-      Send cmpSmallR[ihB.Input]
-  }
   else if (ihA.Input == ";") {
     if cmpSemicolon.Has(ihB.Input)
       Send cmpSemicolon[ihB.Input]
@@ -1981,24 +2124,32 @@ cmpSmallN["0"] := "{u+277f}"  ; (❿) dingbat negative circled digit 10
     if cmpBracketRight.Has(ihB.Input)
       Send cmpBracketRight[ihB.Input]
   }
-  else if (ihA.Input == "C") {
-    if cmpCapitalC.Has(ihB.Input)
-      Send cmpCapitalC[ihB.Input]
+  else if (ihA.Input == "\") {
+    if cmpBackslash.Has(ihB.Input)
+      Send cmpBackslash[ihB.Input]
+  }
+  else if (ihA.Input == "G") {
+    if cmpCapitalG.Has(ihB.Input)
+      Send cmpCapitalG[ihB.Input]
   }
-  else if (ihA.Input == "e") {
-    if cmpSmallE.Has(ihB.Input)
-      Send cmpSmallE[ihB.Input]
+  else if (ihA.Input == "B") {
+    if cmpCapitalB.Has(ihB.Input)
+      Send cmpCapitalB[ihB.Input]
   }
-  else if (ihA.Input == "E") {
-    if cmpCapitalE.Has(ihB.Input)
-      Send cmpCapitalE[ihB.Input]
+  else if (ihA.Input == "L") {
+    if cmpCapitalL.Has(ihB.Input)
+      Send cmpCapitalL[ihB.Input]
   }
-  else if (ihA.Input == "V") {
-    if cmpCapitalV.Has(ihB.Input)
-      Send cmpCapitalV[ihB.Input]
+  else if (ihA.Input == "R") {
+    if cmpCapitalR.Has(ihB.Input)
+      Send cmpCapitalR[ihB.Input]
   }
   else if (ihA.Input == "6") {
     if cmpDigitSix.Has(ihB.Input)
       Send cmpDigitSix[ihB.Input]
   }
+  else if (ihA.Input == "C") {
+    if cmpCapitalC.Has(ihB.Input)
+      Send cmpCapitalC[ihB.Input]
+  }
 }